10 GOTO100
50 REM <YES>
51 S=54272:FORE=STOS+28:POKEE,0:NEXT
52 POKE54296,15:POKE54277,42:POKE54278,250
53 POKE54276,23:POKE54273,23:POKE54272,191
54 FORT=1TO150:NEXT:POKE54276,32:FORT=1TO200:NEXT
55 POKE54296,0:RETURN
60 REM <N0>
61 S=54272:FORE=STOS+28:POKEE,0:NEXT
62 POKE54296,15:POKE54277,18:POKE54278,242
63 POKE54276,33:POKE54273,4:POKE54272,48
64 FORT=1TO250:NEXT:POKE54276,32:FORT=1TO300:NEXT
65 POKE54296,0:RETURN
70 REM <BLIP>
71 S=54272:FORE=STOS+28:POKEE,0:NEXT
72 POKE54296,5:POKE54277,42:POKE54278,250
73 POKE54276,23:POKE54273,23:POKE54272,191
74 FORT=1TO30:NEXT:POKE54276,32:FORT=1TO50:NEXT
75 POKE54296,0:RETURN
80 FORT=1TO500:NEXT:RETURN
81 FORT=1TO1000:NEXT:RETURN
82 FORT=1TO2000:NEXT:RETURN
83 FORT=1TO3000:NEXT:RETURN
84 FORT=1TO4000:NEXT:RETURN
85 FORT=1TO5000:NEXT:RETURN
90 GOSUB81:GOSUB70
91 PRINT"[154]      [208]RESS [211][208][193][195][197][160][194][193][210][160]TO CONTINUE
92 [161]R$:[139]R$[179][177][199](32)[167]92
93 [142]
95 [153]"  PEEKETTER LUCK WITH THE NEXT QUESTION.OPEN":[142]
100 [151]53280,0:[151]53281,0:[151]646,3:[151]53272,23:C[178]0:P[178]0:W[178]0:D[178]0:G[178]0
101 [153]"LOAD      ATNCLOSE(null)(null)(null)CHR$CLOSEVALSTR$(null)LENATN(null)RIGHT$(null)(null)ATN(null)CLOSE(null)(null)(null)CHR$(null)ATN(null)
102 PRINT"           [198][207][210][160][195]64 [195][207][205][208][213][212][197][210][211]
105 [153]"                                        WAIT";
110 [153]"                                        WAIT";
115 [153]"     (null)RACTICE (null)ROBLEMS IN ATNRITHMETIC    WAIT";
120 [153]"                                        WAIT";
125 [153]"           CHR$RADE 3     (null)ART 2           WAIT";
130 [153]"                                        WAIT";
135 [153]"               (null)ESSON 8                 WAIT";
140 [153]"                                        WAIT";
145 [153]"             (null)ROVING (null)ORK     OPEN          WAIT";
150 [153]"                                        WAIT";
155 [153]"                                        WAIT"
160 [153]"                  WHC "
165 [141]90
170 [153]"PRINTLOAD       ATNND AWAY WE GO......."
175 [141]81:[141]50:[141]80
200 [153]"PRINT#LOAD               (null)UESTION 1 WAITOPEN":Z[178]0
205 [153]"  (null)ARY SAID THAT A PEN COSTS 12 CENTS
210 PRINT"  AND THAT FOUR WOULD COST 48 CENTS.
215 [153]"  (null)AS SHE RIGHT?"
220 [141]81:[141]70
225 [153]"             ON"
230 [133] A$
240 [139]A$[179][177]"YES"[175]A$[179][177]"Y"[167] 255
245 [153]"SYS                LEN(null)(null)(null)VALLEN(null)!!               WAITOPEN":[141]50:[141]82
250 P[178]P[170]1:[137]300
255 [153]"DEF  (null)(null)LENLEFT$! .......... (null)HAT LEFT$(null)(null)(null)!":[141]60:[141]82:Z[178]Z[170]1
260 [139]Z[178]2[167]G[178]G[170]1:[137]275
265 [153]"SYSON  (null)RY AGAIN                            OPEN":[141]70:[141]81:W[178]W[170]1
270 [153]"OPENONON                                        ONONONONONON":[137]225
275 [153]"ON   (null)HE CORRECT ANSWER IS  YES SYS      ":[141]82
280 [153]"    12 X 4 = 48        "
295 [141]82:[141]90
300 [153]"PRINT#LOAD               (null)UESTION 2 WAITOPEN":Z[178]0
305 [153]"  MID$AMIE SAID THAT A FIFTEEN CENT BUN
310 PRINT"  AND A POUND OF POTATOES AT 35 CENTS     WOULD COST 55 CENTS.
315 [153]"  RIGHT$S THAT CORRECT?"
320 [141]81:[141]70
325 [153]"             ON"
330 [133] A$
340 [139]A$[179][177]"NO"[175]A$[179][177]"N"[167]355
345 [153]"SYS                LEN(null)(null)(null)VALLEN(null)!!               WAITOPEN":[141]50:[141]82
350 P[178]P[170]1:[137]400
355 [153]"DEF  (null)(null)LENLEFT$! .......... (null)HAT LEFT$(null)(null)(null)!":[141]60:[141]82:Z[178]Z[170]1
360 [139]Z[178]2[167]G[178]G[170]1:[137]375
365 [153]"SYSON  (null)RY AGAIN                            OPEN":[141]70:[141]81:W[178]W[170]1
370 [153]"OPENONON                                        ONONONONONON":[137]325
375 [153]"ON   (null)HE CORRECT ANSWER IS  NO SYS      ":[141]82
380 [153]"    15 + 35 = 50  "
395 [141]82:[141]90
400 [153]"PRINT#LOAD               (null)UESTION 3 WAITOPEN":Z[178]0
405 [153]"  MID$ENNY SOLVED THIS PROBLEM, '(null)HAT IS
410 PRINT"  THE DIFFERENCE BETWEEN 26 AND 18?'
415 [153]"  AND GOT 14 FOR HER ANSWER."
417 [153]"  (null)AS SHE RIGHT?"
420 [141]81:[141]70
425 [153]"             ON"
430 [133] A$
440 [139]A$[179][177]"NO"[175]A$[179][177]"N"[167]455
445 [153]"SYS                LEN(null)(null)(null)VALLEN(null)!!               WAITOPEN":[141]50:[141]82
450 P[178]P[170]1:[137]500
455 [153]"DEF  (null)(null)LENLEFT$! .......... (null)HAT LEFT$(null)(null)(null)!":[141]60:[141]82:Z[178]Z[170]1
460 [139]Z[178]2[167]G[178]G[170]1:[137]475
465 [153]"SYSON  (null)RY AGAIN                            OPEN":[141]70:[141]81:W[178]W[170]1
470 [153]"OPENONON                                        ONONONONONON":[137]425
475 [153]"ON   (null)HE CORRECT ANSWER IS  NO SYS      ":[141]82
480 [153]"    26 - 18 = 8   "
495 [141]82:[141]90
500 [153]"PRINT#LOAD               (null)UESTION 5 WAITOPEN":Z[178]0
505 [153]"  ASCOUR APPLES COST 24 CENTS.  (null)ANDRA
510 PRINT"  SAID THEY COST 6 CENTS EACH.
515 [153]"  (null)AS SHE RIGHT?"
520 [141]81:[141]70
525 [153]"             ON"
530 [133] A$
540 [139]A$[179][177]"YES"[175]A$[179][177]"Y"[167] 555
545 [153]"SYS                LEN(null)(null)(null)VALLEN(null)!!               WAITOPEN":[141]50:[141]82
550 P[178]P[170]1:[137]600
555 [153]"DEF  (null)(null)LENLEFT$! .......... (null)HAT LEFT$(null)(null)(null)!":[141]60:[141]82:Z[178]Z[170]1
560 [139]Z[178]2[167]G[178]G[170]1:[137]575
565 [153]"SYSON  (null)RY AGAIN                            OPEN":[141]70:[141]81:W[178]W[170]1
570 [153]"OPENONON                                        ONONONONONON":[137]525
575 [153]"ON   (null)HE CORRECT ANSWER IS  YES SYS      ":[141]82
580 [153]"    24 / 4 = 6    "
595 [141]82:[141]90
600 [153]"PRINT#LOAD               (null)UESTION 5 WAITOPEN":Z[178]0
605 [153]"  (null)AS (null)OM RIGHT WHEN HE SAID THAT THREE
610 PRINT"  SCHOOL MOVIE TICKETS AT 25 CENTS
615 [153]"  EACH WOULD COST 75 CENTS?"
620 [141]81:[141]70
625 [153]"             ON"
630 [133] A$
640 [139]A$[179][177]"YES"[175]A$[179][177]"Y"[167] 655
645 [153]"SYS                LEN(null)(null)(null)VALLEN(null)!!               WAITOPEN":[141]50:[141]82
650 P[178]P[170]1:[137]700
655 [153]"DEF  (null)(null)LENLEFT$! .......... (null)HAT LEFT$(null)(null)(null)!":[141]60:[141]82:Z[178]Z[170]1
660 [139]Z[178]2[167]G[178]G[170]1:[137]675
665 [153]"SYSON  (null)RY AGAIN                            OPEN":[141]70:[141]81:W[178]W[170]1
670 [153]"OPENONON                                        ONONONONONON":[137]625
675 [153]"ON   (null)HE CORRECT ANSWER IS  YES SYS      ":[141]82
680 [153]"    25 X 3 = 75   "
695 [141]82:[141]90
700 [153]"PRINT#LOAD               (null)UESTION 6 WAITOPEN":Z[178]0
705 [153]"  RIGHT$S FIFTY CENTS ENOUGH TO BUY 12
710 PRINT"  PENCILS AT 5 CENTS A PENCIL?"
720 GOSUB81:GOSUB70
725 PRINT"             [145]"
730 INPUT A$
740 IFA$<>"NO"ANDA$<>"N"THEN 755
745 PRINT"[158]                [195][207][210][210][197][195][212]!!               [146][159]":GOSUB50:GOSUB82
750 P=P+1:GOTO800
755 PRINT"[150]  [207][213][195][200]! .......... [212]HAT [200][213][210][212]!":GOSUB60:GOSUB82:Z=Z+1
760 IFZ=2THENG=G+1:GOTO775
765 PRINT"[158][145]  [212]RY AGAIN                            [159]":GOSUB70:GOSUB81:W=W+1
770 PRINT"[159][145][145]                                        [145][145][145][145][145][145]":GOTO725
775 PRINT"[145]   [212]HE CORRECT ANSWER IS  NO [158]      ":GOSUB82
780 PRINT"    50 / 5 = 10   "
795 GOSUB82:GOSUB90
800 PRINT"[152][147]               [209]UESTION 7 [146][159]":Z=0
805 PRINT"  [193] TEACHER COLLECTED $6.00 TO PAY FOR
810 [153]"  SOFT DRINKS AT 50 CENTS A CAN.
815 PRINT"  [205]ARGARET SAID SHE COULD BUY 12 CANS.
817 [153]"  (null)AS THAT RIGHT?"
820 [141]81:[141]70
825 [153]"             ON"
830 [133] A$
840 [139]A$[179][177]"YES"[175]A$[179][177]"Y"[167] 855
845 [153]"SYS                LEN(null)(null)(null)VALLEN(null)!!               WAITOPEN":[141]50:[141]82
850 P[178]P[170]1:[137]900
855 [153]"DEF  (null)(null)LENLEFT$! .......... (null)HAT LEFT$(null)(null)(null)!":[141]60:[141]82:Z[178]Z[170]1
860 [139]Z[178]2[167]G[178]G[170]1:[137]875
865 [153]"SYSON  (null)RY AGAIN                            OPEN":[141]70:[141]81:W[178]W[170]1
870 [153]"OPENONON                                        ONONONONONON":[137]825
875 [153]"ON   (null)HE CORRECT ANSWER IS  YES SYS      ":[141]82
880 [153]"    600 / 50 = 12    "
895 [141]82:[141]90
900 [153]"PRINT#LOAD               (null)UESTION 8 WAITOPEN":Z[178]0
905 [153]"  ASCRED SAID THERE WERE 72 EGGS IN 6
910 PRINT"  ONE-DOZEN CARTONS OF EGGS.
915 [153]"  (null)AS HE RIGHT?"
920 [141]81:[141]70
925 [153]"             ON"
930 [133] A$
940 [139]A$[179][177]"YES"[175]A$[179][177]"Y"[167] 955
945 [153]"SYS                LEN(null)(null)(null)VALLEN(null)!!               WAITOPEN":[141]50:[141]82
950 P[178]P[170]1:[137]1000
955 [153]"DEF  (null)(null)LENLEFT$! .......... (null)HAT LEFT$(null)(null)(null)!":[141]60:[141]82:Z[178]Z[170]1
960 [139]Z[178]2[167]G[178]G[170]1:[137]975
965 [153]"SYSON  (null)RY AGAIN                            OPEN":[141]70:[141]81:W[178]W[170]1
970 [153]"OPENONON                                        ONONONONONON":[137]925
975 [153]"ON   (null)HE CORRECT ANSWER IS  YES SYS      ":[141]82
980 [153]"    12 X 6 = 72   "
995 [141]82:[141]90
1000 [153]"PRINT#LOAD               (null)UESTION 9 WAITOPEN":Z[178]0
1005 [153]"  LEFT$ARRY SAID THAT 3 QUARTS OF OIL AT
1010 PRINT"  80 CENTS A PINT WOULD COST $9.50.
1015 [153]"  (null)AS HE RIGHT?"
1020 [141]81:[141]70
1025 [153]"             ON"
1030 [133] A$
1040 [139]A$[179][177]"NO"[175]A$[179][177]"N"[167]1055
1045 [153]"SYS                LEN(null)(null)(null)VALLEN(null)!!               WAITOPEN":[141]50:[141]82
1050 P[178]P[170]1:[137]1100
1055 [153]"DEF  (null)(null)LENLEFT$! .......... (null)HAT LEFT$(null)(null)(null)!":[141]60:[141]82:Z[178]Z[170]1
1060 [139]Z[178]2[167]G[178]G[170]1:[137]1075
1065 [153]"SYSON  (null)RY AGAIN                            OPEN":[141]70:[141]81:W[178]W[170]1
1070 [153]"OPENONON                                        ONONONONONON":[137]1025
1075 [153]"ON   (null)HE CORRECT ANSWER IS  NO SYS      ":[141]82
1080 [153]"    3 X 4 X .80 = 9.60  "
1095 [141]82:[141]90
1100 [153]"PRINT#LOAD               (null)UESTION 10 WAITOPEN":Z[178]0
1105 [153]"  (null)OULD THE TEACHER HAVE A DOLLAR, IF
1110 PRINT"  18 STUDENTS EACH GAVE HER 5 CENTS       TO BUY A PICTURE?"
1120 GOSUB81:GOSUB70
1125 PRINT"             [145]"
1130 INPUT A$
1140 IFA$<>"N"ANDA$<>"NO"THEN 1155
1145 PRINT"[158]                [195][207][210][210][197][195][212]!!               [146][159]":GOSUB50:GOSUB82
1150 P=P+1:GOTO1200
1155 PRINT"[150]  [207][213][195][200]! .......... [212]HAT [200][213][210][212]!":GOSUB60:GOSUB82:Z=Z+1
1160 IFZ=2THENG=G+1:GOTO1175
1165 PRINT"[158][145]  [212]RY AGAIN                            [159]":GOSUB70:GOSUB81:W=W+1
1170 PRINT"[159][145][145]                                        [145][145][145][145][145][145]":GOTO1125
1175 PRINT"[145]   [212]HE CORRECT ANSWER IS  NO [158]      ":GOSUB82
1180 PRINT"    18 X 5 = 90         "
1195 GOSUB82:GOSUB90
1200 PRINT"[147]           [210]EPORT [195]ARD [146]"
1205 D=W-G:C=10-W
1210 PRINT"[153]  1. [209]UESTIONS ANSWERED CORRECTLY            ON FIRST TRY:
1215 [153]"                 ";C
1220 [153]"FOR  2. (null)UESTIONS ANSWERED CORRECTLY            ON SECOND TRY:
1225 PRINT"                 ";D
1230 PRINT"[150]  3. [209]UESTIONS MISSED ON SECOND TRY:
1235 [153]"                 ";G;""
1245 [141]90
1250 [153]"SYSLOAD  (null)OU HAVE A CHOICE:
1255 PRINT"  [208]RESS  [210] [146] TO REPEAT THIS LESSON
1260 [153]"  (null)RESS  (null) WAIT TO RETURN TO THE MENUOPEN"
1265 [161]R$:[139]R$[179][177]"R"[175]R$[179][177]"M"[167]1265
1270 [139]R$[178]"R"[167][140]:[137]100
1275 [140]
1280 [153]"LOAD (null)ETURNING TO THE DISK MENU
1285 LOAD"MENU",8
1290 RUN
1295 END
1300 REM BILL CUMBERLAND 90:12:21